CAAElliptical_LengthOfEllipse <-
function(e, a){
.Call("CAAElliptical_LengthOfEllipse", e, a)
}
